home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / filutil / vndutl13.zip / UPL_OZCS.BAT < prev    next >
DOS Batch File  |  1994-07-27  |  3KB  |  76 lines

  1. goto start
  2. :usage
  3. @echo off
  4. echo ┌───────────────────────────────────────────────────────┐
  5. echo │ upl_ozcs.bat -- Builds OzCIS upload script from       │
  6. echo │                 VENDINFO.DIZ file.                    │
  7. echo │                                                       │
  8. echo │ usage:                                                │
  9. echo │        upl_ozcs forum library vendinfo_file package   │
  10. echo │ where:                                                │
  11. echo │        forum   = CompuServe name of desired forum     │
  12. echo │        library = library number within forum          │
  13. echo │        vendinfo_file = pathname of VENDINFO.DIZ file  │
  14. echo │        package = full pathname of upload package      │
  15. echo │                                                       │
  16. echo │ example:                                              │
  17. echo │    upl_ozcs SHAREW 0 C:\VENDINFO.DIZ C:\MYPKG100.ZIP  │
  18. echo │                                                       │
  19. echo │ NOTE: Invoke in OzCIS MSGS directory.                 │
  20. echo │       VENDPRCS.EXE must be on your DOS path.          │
  21. echo │ NOTE: Presently works only for single-package         │
  22. echo │       products (products with only one ZIP)           │
  23. echo │                                                       │
  24. echo │ From the VNDUTL VENDINFO Utilities, v1.02 (7/26/94)   │
  25. echo │ Copyright 1994 Rams' Island Software, Parker, CO USA  │
  26. echo └───────────────────────────────────────────────────────┘
  27. goto done
  28.  
  29. ::----- check arguments -------------------------------------------
  30. ::-----    third argument must be VENDINFO file pathname ----------
  31. ::-----    fourth argument must be upload package pathname --------
  32. :start
  33. if %1. == .        goto usage
  34. if %2. == .        goto usage
  35. if %3. == .        goto usage
  36. if %4. == .        goto usage
  37. if not exist %3    goto viProblem
  38. if not exist %4    goto pkgProblem
  39. goto argsOK
  40.  
  41. :argsOK
  42. ::----- test VENDINFO file ----------------------------------------   
  43. vendprcs %3 -xppt
  44. if errorlevel 52 goto viFileOK
  45. goto viProblem
  46.  
  47. :viFileOK
  48. ::----- do the work -----------------------------------------------   
  49. vendprcs          -y " "                  >> %1.ul
  50. vendprcs %3 -xppc -y ";%2;BIN;@.ZIP;%4"   >> %1.ul
  51. vendprcs %3 -xpd4 -zc45                   >> %1.ul
  52. echo ╠EOM╣                                >> %1.ul
  53. vendprcs %3 -xpk  -zc45                   >> %1.ul
  54. vendprcs %3 -xpp  -zn                     >> %1.ul
  55. vendprcs %3 -xpe  -zn    -y " @ v"        >> %1.ul
  56. vendprcs %3 -xpv  -zn    -y "@ "          >> %1.ul
  57. vendprcs %3 -xpt         -y "(@)"         >> %1.ul
  58. vendprcs          -y " "                  >> %1.ul
  59. goto done
  60.  
  61. :viProblem
  62. @echo off
  63. cls
  64. echo Specified VENDINFO file
  65. echo    (%3)
  66. echo does not exist, or is corrupted, unregistered, lacks a
  67. echo CompuServe package name, or has some other difficulty.
  68. goto done
  69.  
  70. :pkgProblem
  71. @echo off
  72. cls
  73. echo Upload package (%4) does not exist.
  74.  
  75. :done
  76.